(mouse-buffer-menu): Use aref rather than string-match.

diff --git a/lisp/mouse.el b/lisp/mouse.el
index 351d9fcd1a9bfc0eec47c0ef32f035f420fa521f..bd4e439b21e7d016659c8726206eb5a37bf4b1ac 100644 (file)
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -1197,8 +1197,7 @@ and selects that window."
            (setq tail (buffer-list))
            (while tail
              (let ((elt (car tail)))
-               (if (not (string-match "^ "
-                                      (buffer-name elt)))
+               (if (/= (aref (buffer-name elt) 0) ?\ )
                    (setq head
                          (cons
                           (cons